home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Workbench Add-On
/
Workbench Add-On - Volume 1.iso
/
BBS-Archive
/
Dev
/
Barfly1_24.lha
/
Barfly
/
ARexx-Debug
/
Windows2.BDEBUG
< prev
next >
Wrap
Text File
|
1994-03-17
|
999b
|
49 lines
/************************************************************************
*
* Requester_Arexx.BDEBUG copyright (c) 1993, Ralph Schmidt
*
* This is an example how to control the arexx port of BDEBUG....
* If you have further suggestions mail it, because it's my first
* try with AREXX and so I'm no real expert.
*
* Version 1.00: 27.3.1993
*
************************************************************************/
/* This command allows BDEBUG to pass status variables */
Options FailAt 30
options results
/* Activate BDEBUG Arexx port */
address 'rexx_BDEBUG'
options results
SAY 'Windows.......'
ACTIVATE_ROOTWINDOW
OPEN_DISSWINDOW'@PC'
OPEN_MEMWINDOW'$10000'
FIRST_DISSWINDOW
GOTO_ADDRESS'$4000'
GOTO_ADDRESS'$8000'
GOTO_ADDRESS'$c000'
GOTO_ADDRESS'$d000'
GOTO_ADDRESS'$e000'
GOTO_ADDRESS'$f000'
GOTO_ADDRESS'$10000'
GOTO_ADDRESS'$11000'
GOTO_ADDRESS'$12000'
GOTO_ADDRESS'$13000'
GOTO_ADDRESS'$14000'
CLEAR_ADDRESS
FIRST_MEMWINDOW
LINK_REGISTER'a5'
exit